(ns com.yawmark.euler.clj.e10
    (:use [clojure.contrib.lazy-seqs :only (primes)]))

;; The sum of the primes below 10 is 2 + 3 + 5 + 7 = 17.
;; 
;; Find the sum of all the primes below two million.
(defn euler-10 []
      (reduce + (take-while #(< % 2000000) primes)))

(println (time (euler-10)))
